home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / x / volume3 / x11.3 / patch8 next >
Encoding:
Internet Message Format  |  1989-02-03  |  36.1 KB
  1. Path: uunet!wyse!mikew
  2. From: mikew@wyse.wyse.com (Mike Wexler)
  3. Newsgroups: comp.sources.x
  4. Subject: v03i009:  X11 Release 3, Patch8
  5. Message-ID: <2032@wyse.wyse.com>
  6. Date: 3 Feb 89 16:34:46 GMT
  7. Organization: Wyse Technology, San Jose
  8. Lines: 1245
  9. Approved: mikew@wyse.com
  10.  
  11. Submitted-by: mikew@wyse.com
  12. Posting-number: Volume 3, Issue 9
  13. Archive-name: x11.3/patch8
  14.  
  15.  
  16.  
  17.     Destroy procs were not being called for descendents of popups
  18.     when the parent of the popup was destroyed.
  19.  
  20.     Routines registered with XtAddInput can get called twice for every event.
  21.  
  22.     XtAppProcessEvent may process an XEvent even if told not to in the mask.
  23.  
  24.     XtAppProcessEvent might loop consuming as much cpu as it can get if
  25.     events are available from any source it was supposed to ignore.
  26.  
  27.     The display_accelerator method was being passed translations,
  28.     not accelerators.
  29.  
  30.     Installing accelerators into a destination with no translations
  31.     caused segmentation fault.
  32.  
  33. Server bugs:
  34.  
  35.     At apparently random times, when a window was destroyed, the Sun server
  36.     dumped core.
  37.  
  38.     Sun server allowed the default colormap to be destroyed, causing havoc.
  39.  
  40. *** old/lib/Xt/Create.c
  41. --- lib/Xt/Create.c
  42. ***************
  43. *** 1,5 ****
  44.   #ifndef lint
  45. ! static char Xrcsid[] = "$XConsortium: Create.c,v 1.47 88/10/17 20:19:21 swick Exp $";
  46.   /* $oHeader: Create.c,v 1.5 88/09/01 11:26:22 asente Exp $ */
  47.   #endif lint
  48.   
  49. --- 1,5 ----
  50.   #ifndef lint
  51. ! static char Xrcsid[] = "$XConsortium: Create.c,v 1.48 88/12/02 12:49:46 swick Exp $";
  52.   /* $oHeader: Create.c,v 1.5 88/09/01 11:26:22 asente Exp $ */
  53.   #endif lint
  54.   
  55. ***************
  56. *** 281,286 ****
  57. --- 281,293 ----
  58.       Window win;
  59.           if ((win = XtWindow(widget)) != NULL)
  60.           XDestroyWindow( XtDisplay(widget), win );
  61. + 
  62. +     return;
  63. +     /* don't update parent's popup_list, as we won't then be able to find
  64. +      * this child for Phase2Destroy.  This also allows for the possibility
  65. +      * that a destroy callback higher up in the hierarchy may care to
  66. +      * know that this popup child once existed.
  67. +      */
  68.       }
  69.       parent->core.num_popups--;
  70.       for (/*i=i*/; i<parent->core.num_popups; i++)
  71.  
  72.  
  73. *** lib/Xt/NextEvent.c.old
  74. --- lib/Xt/NextEvent.c
  75. ***************
  76. *** 1,5 ****
  77.   #ifndef lint
  78. ! static char Xrcsid[] = "$XConsortium: NextEvent.c,v 1.56 88/10/21 13:23:02 swick Exp $";
  79.   /* $oHeader: NextEvent.c,v 1.4 88/09/01 11:43:27 asente Exp $ */
  80.   #endif lint
  81.   
  82. --- 1,5 ----
  83.   #ifndef lint
  84. ! static char Xrcsid[] = "$XConsortium: NextEvent.c,v 1.59 89/01/18 17:04:01 swick Exp $";
  85.   /* $oHeader: NextEvent.c,v 1.4 88/09/01 11:43:27 asente Exp $ */
  86.   #endif lint
  87.   
  88. ***************
  89. *** 77,89 ****
  90.    *
  91.    * This routine returns when there is something to be done
  92.    *
  93.    *
  94. !  * _XtWaitForSomething( ignoreTimers, ignoreInputs, block, howlong, displaySet)
  95.    * Boolean ignoreTimers;     (Don't return if a timer would fire
  96.    *                Also implies forget timers exist)
  97.    *
  98.    * Boolean ignoreInputs;     (Ditto for input callbacks )
  99.    *
  100.    * Boolean block;         (Okay to block)
  101.    * TimeVal howlong;         (howlong to wait for if blocking and not
  102.    *                doing Timers... Null mean forever.
  103. --- 77,96 ----
  104.    *
  105.    * This routine returns when there is something to be done
  106.    *
  107. +  * Before calling this with ignoreInputs==False, app->outstandingQueue should
  108. +  * be checked; this routine will not verify that an alternate input source
  109. +  * has not already been enqueued.
  110.    *
  111. !  *
  112. !  * _XtWaitForSomething( ignoreTimers, ignoreInputs, ignoreEvents,
  113. !  *            block, howlong, appContext)
  114.    * Boolean ignoreTimers;     (Don't return if a timer would fire
  115.    *                Also implies forget timers exist)
  116.    *
  117.    * Boolean ignoreInputs;     (Ditto for input callbacks )
  118.    *
  119. +  * Boolean ignoreEvents;     (Ditto for X events)
  120. +  *
  121.    * Boolean block;         (Okay to block)
  122.    * TimeVal howlong;         (howlong to wait for if blocking and not
  123.    *                doing Timers... Null mean forever.
  124. ***************
  125. *** 90,99 ****
  126.    *                Maybe should mean shortest of both)
  127.    * XtAppContext app;         (Displays to check wait on)
  128.    * Returns display for which input is available, if any
  129.    */
  130. ! int _XtwaitForSomething(ignoreTimers, ignoreInputs, block, howlong, app)
  131.       Boolean ignoreTimers;
  132.       Boolean ignoreInputs;
  133.       Boolean block;
  134.       unsigned long *howlong;
  135.       XtAppContext app;
  136. --- 97,114 ----
  137.    *                Maybe should mean shortest of both)
  138.    * XtAppContext app;         (Displays to check wait on)
  139.    * Returns display for which input is available, if any
  140. +  * and if ignoreEvents==False, else returns -1
  141. +  *
  142. +  * if ignoring everything && block=True && howlong=NULL, you'll have
  143. +  * lots of time for coffee; better not try it!  In fact, it probably
  144. +  * makes little sense to do this regardless of the value of howlong
  145. +  * (bottom line is, we don't bother checking here).
  146.    */
  147. ! int _XtwaitForSomething(ignoreTimers, ignoreInputs, ignoreEvents,
  148. !             block, howlong, app)
  149.       Boolean ignoreTimers;
  150.       Boolean ignoreInputs;
  151. +     Boolean ignoreEvents;
  152.       Boolean block;
  153.       unsigned long *howlong;
  154.       XtAppContext app;
  155. ***************
  156. *** 147,154 ****
  157.               wmaskfd = zero;
  158.               emaskfd = zero;
  159.           }
  160. !         for (d = 0; d < app->count; d++) {
  161. !             FD_SET (ConnectionNumber(app->list[d]), &rmaskfd);
  162.           }
  163.           nfound = select (app->fds.nfds, (int *) &rmaskfd,
  164.               (int *) &wmaskfd, (int *) &emaskfd, wait_time_ptr);
  165. --- 162,171 ----
  166.               wmaskfd = zero;
  167.               emaskfd = zero;
  168.           }
  169. !         if (!ignoreEvents) {
  170. !             for (d = 0; d < app->count; d++) {
  171. !             FD_SET (ConnectionNumber(app->list[d]), &rmaskfd);
  172. !             }
  173.           }
  174.           nfound = select (app->fds.nfds, (int *) &rmaskfd,
  175.               (int *) &wmaskfd, (int *) &emaskfd, wait_time_ptr);
  176. ***************
  177. *** 198,203 ****
  178. --- 215,221 ----
  179.               }
  180.       }
  181.       if(ignoreInputs) {
  182. +         if (ignoreEvents) return -1; /* then only doing timers */
  183.           for (d = 0; d < app->count; d++) {
  184.           if (FD_ISSET(ConnectionNumber(app->list[d]), &rmaskfd)) {
  185.               return d;
  186. ***************
  187. *** 207,222 ****
  188.       ret = -1;
  189.       for (i = 0; i < app->fds.nfds && nfound > 0; i++) {
  190.           if (FD_ISSET (i, &rmaskfd)) {
  191. !         for (d = 0; d < app->count; d++) {
  192. !             if (i == ConnectionNumber(app->list[d])) {
  193. !             if (ret == -1) ret = d;
  194. !             goto ENDILOOP;
  195.               }
  196.           }
  197.   
  198.           app->selectRqueue[i]->ie_oq = app->outstandingQueue;
  199.           app->outstandingQueue = app->selectRqueue[i];
  200. -         nfound--;
  201.           }
  202.           if (FD_ISSET (i, &wmaskfd)) {
  203.           app->selectWqueue[i]->ie_oq = app->outstandingQueue;
  204. --- 225,242 ----
  205.       ret = -1;
  206.       for (i = 0; i < app->fds.nfds && nfound > 0; i++) {
  207.           if (FD_ISSET (i, &rmaskfd)) {
  208. !         nfound--;
  209. !         if (!ignoreEvents) {
  210. !             for (d = 0; d < app->count; d++) {
  211. !             if (i == ConnectionNumber(app->list[d])) {
  212. !                 if (ret == -1) ret = d;
  213. !                 goto ENDILOOP;
  214. !             }
  215.               }
  216.           }
  217.   
  218.           app->selectRqueue[i]->ie_oq = app->outstandingQueue;
  219.           app->outstandingQueue = app->selectRqueue[i];
  220.           }
  221.           if (FD_ISSET (i, &wmaskfd)) {
  222.           app->selectWqueue[i]->ie_oq = app->outstandingQueue;
  223. ***************
  224. *** 362,368 ****
  225.       InputEvent *sptr;
  226.       XtInputMask condition = (XtInputMask) Condition;
  227.       
  228. !     sptr = (InputEvent *)XtMalloc((unsigned) sizeof (*sptr));
  229.       if(condition == XtInputReadMask){
  230.           sptr->ie_next = app->selectRqueue[source];
  231.           app->selectRqueue[source] = sptr;
  232. --- 382,388 ----
  233.       InputEvent *sptr;
  234.       XtInputMask condition = (XtInputMask) Condition;
  235.       
  236. !     sptr = XtNew(InputEvent);
  237.       if(condition == XtInputReadMask){
  238.           sptr->ie_next = app->selectRqueue[source];
  239.           app->selectRqueue[source] = sptr;
  240. ***************
  241. *** 474,491 ****
  242.       struct timeval  cur_time;
  243.       struct timezone cur_timezone;
  244.   
  245.       if (app->fds.count > 0) {
  246.           /* Call _XtwaitForSomething to get input queued up */
  247. !         (void) _XtwaitForSomething(TRUE, FALSE, FALSE,
  248.           (unsigned long *)NULL, app);
  249.       }
  250. - 
  251. -     for (ie_ptr = app->outstandingQueue; ie_ptr != NULL;) {
  252. -         app->outstandingQueue = ie_ptr->ie_oq;
  253. -         ie_ptr ->ie_oq = NULL;
  254. -         IeCallProc(ie_ptr);
  255. -         ie_ptr = app->outstandingQueue;
  256. -     }
  257.       if (app->timerQueue != NULL) {    /* check timeout queue */
  258.           (void) gettimeofday (&cur_time, &cur_timezone);
  259.           while(IS_AFTER (app->timerQueue->te_timer_value, cur_time)) {
  260. --- 494,514 ----
  261.       struct timeval  cur_time;
  262.       struct timezone cur_timezone;
  263.   
  264. + #define DrainQueue() \
  265. +     for (ie_ptr = app->outstandingQueue; ie_ptr != NULL;) { \
  266. +         app->outstandingQueue = ie_ptr->ie_oq;        \
  267. +         ie_ptr ->ie_oq = NULL;                \
  268. +         IeCallProc(ie_ptr);                    \
  269. +         ie_ptr = app->outstandingQueue;            \
  270. +     }
  271. + /*enddef*/
  272. +     DrainQueue();
  273.       if (app->fds.count > 0) {
  274.           /* Call _XtwaitForSomething to get input queued up */
  275. !         (void) _XtwaitForSomething(TRUE, FALSE, TRUE, FALSE,
  276.           (unsigned long *)NULL, app);
  277. +         DrainQueue();
  278.       }
  279.       if (app->timerQueue != NULL) {    /* check timeout queue */
  280.           (void) gettimeofday (&cur_time, &cur_timezone);
  281.           while(IS_AFTER (app->timerQueue->te_timer_value, cur_time)) {
  282. ***************
  283. *** 498,503 ****
  284. --- 521,527 ----
  285.                 if (app->timerQueue == NULL) break;
  286.           }
  287.       }
  288. + #undef DrainQueue
  289.   }
  290.   
  291.   /* If there are any work procs, call them.  Return whether we did so */
  292. ***************
  293. *** 573,579 ****
  294.       /* We're ready to wait...if there is a work proc, call it */
  295.       if (CallWorkProc(app)) continue;
  296.   
  297. !     d = _XtwaitForSomething(FALSE, FALSE, TRUE,
  298.                   (unsigned long *) NULL, app);
  299.   
  300.       if (d != -1) {
  301. --- 597,603 ----
  302.       /* We're ready to wait...if there is a work proc, call it */
  303.       if (CallWorkProc(app)) continue;
  304.   
  305. !     d = _XtwaitForSomething(FALSE, FALSE, FALSE, TRUE,
  306.                   (unsigned long *) NULL, app);
  307.   
  308.       if (d != -1) {
  309. ***************
  310. *** 622,630 ****
  311.           }
  312.       
  313.           if (mask & XtIMAlternateInput) {
  314. !         if (app->fds.count > 0) {
  315.               /* Call _XtwaitForSomething to get input queued up */
  316. !             (void) _XtwaitForSomething(TRUE, FALSE, FALSE,
  317.                   (unsigned long *)NULL, app);
  318.           }
  319.           if (app->outstandingQueue != NULL) {
  320. --- 646,654 ----
  321.           }
  322.       
  323.           if (mask & XtIMAlternateInput) {
  324. !         if (app->fds.count > 0 && app->outstandingQueue == NULL) {
  325.               /* Call _XtwaitForSomething to get input queued up */
  326. !             (void) _XtwaitForSomething(TRUE, FALSE, TRUE, FALSE,
  327.                   (unsigned long *)NULL, app);
  328.           }
  329.           if (app->outstandingQueue != NULL) {
  330. ***************
  331. *** 654,663 ****
  332.   
  333.           if (CallWorkProc(app)) continue;
  334.   
  335. !         d = _XtwaitForSomething(FALSE, FALSE, TRUE,
  336.                       (unsigned long *) NULL, app);
  337.           
  338. !         if (d != -1) {
  339.           XNextEvent(app->list[d], &event);
  340.           app->last = d;
  341.           if (event.xany.type == MappingNotify) {
  342. --- 678,691 ----
  343.   
  344.           if (CallWorkProc(app)) continue;
  345.   
  346. !         d = _XtwaitForSomething(
  347. !                     (mask & XtIMTimer ? FALSE : TRUE),
  348. !                     (mask & XtIMAlternateInput ? FALSE : TRUE),
  349. !                     (mask & XtIMXEvent ? FALSE : TRUE),
  350. !                     TRUE,
  351.                       (unsigned long *) NULL, app);
  352.           
  353. !         if (mask & XtIMXEvent && d != -1) {
  354.           XNextEvent(app->list[d], &event);
  355.           app->last = d;
  356.           if (event.xany.type == MappingNotify) {
  357. ***************
  358. *** 708,714 ****
  359.       else {
  360.           /* This won't cause a wait, but will enqueue any input */
  361.   
  362. !         if(_XtwaitForSomething(TRUE, FALSE, FALSE, (unsigned long *) NULL,
  363.               app) != -1) ret |= XtIMXEvent;
  364.           if (app->outstandingQueue != NULL) ret |= XtIMAlternateInput;
  365.       }
  366. --- 736,742 ----
  367.       else {
  368.           /* This won't cause a wait, but will enqueue any input */
  369.   
  370. !         if(_XtwaitForSomething(TRUE, FALSE, FALSE, FALSE, (unsigned long *) NULL,
  371.               app) != -1) ret |= XtIMXEvent;
  372.           if (app->outstandingQueue != NULL) ret |= XtIMAlternateInput;
  373.       }
  374. ***************
  375. *** 723,735 ****
  376.       struct timeval  cur_time;
  377.       struct timezone cur_timezone;
  378.   
  379.       if (app->fds.count > 0) {
  380.           /* Call _XtwaitForSomething to get input queued up */
  381. !         (void) _XtwaitForSomething(TRUE, FALSE, FALSE,
  382.               (unsigned long *)NULL, app);
  383.       }
  384.   
  385. -     if (app->outstandingQueue != NULL) return TRUE;
  386.       if (app->timerQueue != NULL) {    /* check timeout queue */
  387.           (void) gettimeofday (&cur_time, &cur_timezone);
  388.           if (IS_AFTER (app->timerQueue->te_timer_value, cur_time)) return TRUE;
  389. --- 751,765 ----
  390.       struct timeval  cur_time;
  391.       struct timezone cur_timezone;
  392.   
  393. +     if (app->outstandingQueue != NULL) return TRUE;
  394. + 
  395.       if (app->fds.count > 0) {
  396.           /* Call _XtwaitForSomething to get input queued up */
  397. !         (void) _XtwaitForSomething(TRUE, FALSE, TRUE, FALSE,
  398.               (unsigned long *)NULL, app);
  399. +         if (app->outstandingQueue != NULL) return TRUE;
  400.       }
  401.   
  402.       if (app->timerQueue != NULL) {    /* check timeout queue */
  403.           (void) gettimeofday (&cur_time, &cur_timezone);
  404.           if (IS_AFTER (app->timerQueue->te_timer_value, cur_time)) return TRUE;
  405. ***************
  406. *** 769,775 ****
  407.           return FALSE;
  408.           }
  409.   
  410. !         d = _XtwaitForSomething(FALSE, FALSE, TRUE,
  411.               (unsigned long *) NULL, app);
  412.   
  413.           if (d != -1) {
  414. --- 799,805 ----
  415.           return FALSE;
  416.           }
  417.   
  418. !         d = _XtwaitForSomething(FALSE, FALSE, FALSE, TRUE,
  419.               (unsigned long *) NULL, app);
  420.   
  421.           if (d != -1) {
  422.  
  423.  
  424. *** lib/Xt/InitialI.h.old
  425. --- lib/Xt/InitialI.h
  426. ***************
  427. *** 1,4 ****
  428. ! /* $XConsortium: InitialI.h,v 1.8 88/10/19 08:35:49 swick Exp $ */
  429.   /* $oHeader: InitializeI.h,v 1.8 88/09/01 11:25:04 asente Exp $ */
  430.   /***********************************************************
  431.   Copyright 1987, 1988 by Digital Equipment Corporation, Maynard, Massachusetts,
  432. --- 1,4 ----
  433. ! /* $XConsortium: InitialI.h,v 1.9 89/01/18 17:05:57 swick Exp $ */
  434.   /* $oHeader: InitializeI.h,v 1.8 88/09/01 11:25:04 asente Exp $ */
  435.   /***********************************************************
  436.   Copyright 1987, 1988 by Digital Equipment Corporation, Maynard, Massachusetts,
  437. ***************
  438. *** 107,116 ****
  439.   extern int _XtAppDestroyCount;
  440.   extern int _XtDpyDestroyCount;
  441.   
  442. ! extern int _XtwaitForSomething(); /* ignoreTimers, ignoreInputs, block, 
  443. !                     howlong, dset */
  444.       /* Boolean ignoreTimers; */
  445.       /* Boolean ignoreInputs; */
  446.       /* Boolean block; */
  447.       /* unsigned long *howlong; */
  448.       /* XtAppContext app */
  449. --- 107,117 ----
  450.   extern int _XtAppDestroyCount;
  451.   extern int _XtDpyDestroyCount;
  452.   
  453. ! extern int _XtwaitForSomething(); /* ignoreTimers, ignoreInputs, ignoreEvents,
  454. !                      block, howlong, appContext */
  455.       /* Boolean ignoreTimers; */
  456.       /* Boolean ignoreInputs; */
  457. +     /* Boolean ignoreEvents; */
  458.       /* Boolean block; */
  459.       /* unsigned long *howlong; */
  460.       /* XtAppContext app */
  461.  
  462.  
  463. *** lib/Xt/Shell.c.old
  464. --- lib/Xt/Shell.c
  465. ***************
  466. *** 1,5 ****
  467.   #ifndef lint
  468. ! static char Xrcsid[] = "$XConsortium: Shell.c,v 1.45 88/10/19 09:21:48 swick Exp $";
  469.   /* $oHeader: Shell.c,v 1.7 88/09/01 11:57:00 asente Exp $ */
  470.   #endif lint
  471.   
  472. --- 1,5 ----
  473.   #ifndef lint
  474. ! static char Xrcsid[] = "$XConsortium: Shell.c,v 1.46 89/01/18 17:04:58 swick Exp $";
  475.   /* $oHeader: Shell.c,v 1.7 88/09/01 11:57:00 asente Exp $ */
  476.   #endif lint
  477.   
  478. ***************
  479. *** 1265,1271 ****
  480.           }
  481.           return TRUE;
  482.           } else {
  483. !         if (_XtwaitForSomething(TRUE, TRUE, TRUE, &timeout,
  484.               app) != -1) continue;
  485.           if (timeout == 0)
  486.             return FALSE;
  487. --- 1265,1271 ----
  488.           }
  489.           return TRUE;
  490.           } else {
  491. !         if (_XtwaitForSomething(TRUE, TRUE, FALSE, TRUE, &timeout,
  492.               app) != -1) continue;
  493.           if (timeout == 0)
  494.             return FALSE;
  495.  
  496.  
  497. *** /tmp/,RCSt1a05545    Fri Jan 20 08:06:10 1989
  498. --- lib/Xt/TMstate.c    Fri Jan 20 08:05:58 1989
  499. ***************
  500. *** 1,5 ****
  501.   #ifndef lint
  502. ! static char Xrcsid[] = "$XConsortium: TMstate.c,v 1.61 88/09/26 09:30:45 swick Exp $";
  503.   /* $oHeader: TMstate.c,v 1.5 88/09/01 17:17:29 asente Exp $ */
  504.   #endif lint
  505.   /*LINTLIBRARY*/
  506. --- 1,5 ----
  507.   #ifndef lint
  508. ! static char Xrcsid[] = "$XConsortium: TMstate.c,v 1.65 89/01/20 08:05:17 swick Exp $";
  509.   /* $oHeader: TMstate.c,v 1.5 88/09/01 17:17:29 asente Exp $ */
  510.   #endif lint
  511.   /*LINTLIBRARY*/
  512. ***************
  513. *** 41,46 ****
  514. --- 41,63 ----
  515.   
  516.   #define StringToAction(string)    ((XtAction) StringToQuark(string))
  517.   
  518. + #define STR_THRESHOLD 25
  519. + #define STR_INCAMOUNT 100
  520. + #define CHECK_STR_OVERFLOW \
  521. +     if (str - *buf > *len - STR_THRESHOLD) {        \
  522. +     String old = *buf;                \
  523. +     *buf = XtRealloc(old, *len += STR_INCAMOUNT);    \
  524. +     str = str - old + *buf;                \
  525. +     }
  526. + 
  527. + #define ExpandToFit(more) \
  528. +     if (str - *buf > *len - STR_THRESHOLD - strlen(more)) {         \
  529. +     String old = *buf;                        \
  530. +     *buf = XtRealloc(old, *len += STR_INCAMOUNT + strlen(more));    \
  531. +     str = str - old + *buf;                        \
  532. +     }
  533. + 
  534. + 
  535.   static void FreeActions(action)
  536.     register ActionPtr action;
  537.   {
  538. ***************
  539. *** 60,93 ****
  540.       }
  541.   }
  542.   
  543. ! static String PrintModifiers(str, mask, mod)
  544.       String str;
  545.       unsigned long mask, mod;
  546.   {
  547. !     if (mask & ShiftMask)
  548. !     (void) sprintf(str, "%sShift", ((mod & ShiftMask) ? "" : "~"));
  549. !     if (mask & ControlMask)
  550. !     (void) sprintf(str, "%sCtrl", ((mod & ControlMask) ? "" : "~"));
  551. !     if (mask & LockMask)
  552. !     (void) sprintf(str, "%sLock", ((mod & LockMask) ? "" : "~"));
  553. !     if (mask & Mod1Mask)
  554. !     (void) sprintf(str, "%sMeta", ((mod & Mod1Mask) ? "" : "~"));
  555. !     if (mask & Mod2Mask)
  556. !     (void) sprintf(str, "%sMod2", ((mod & Mod2Mask) ? "" : "~"));
  557. !     if (mask & Mod3Mask)
  558. !     (void) sprintf(str, "%sMod3", ((mod & Mod3Mask) ? "" : "~"));
  559. !     if (mask & Mod4Mask)
  560. !     (void) sprintf(str, "%sMod4", ((mod & Mod4Mask) ? "" : "~"));
  561. !     if (mask & Mod5Mask)
  562. !     (void) sprintf(str, "%sMod5", ((mod & Mod5Mask) ? "" : "~"));
  563. !     str += strlen(str);
  564.       return str;
  565.   }
  566.   
  567. ! static String PrintEventType(str, event)
  568.       register String str;
  569.       unsigned long event;
  570.   {
  571.       switch (event) {
  572.   #define PRINTEVENT(event) case event: (void) sprintf(str, "<event>"); break;
  573.       PRINTEVENT(KeyPress)
  574. --- 77,139 ----
  575.       }
  576.   }
  577.   
  578. ! static String PrintModifiers(buf, len, str, mask, mod)
  579. !     String *buf;
  580. !     int *len;
  581.       String str;
  582.       unsigned long mask, mod;
  583.   {
  584. !     Boolean notfirst = False;
  585. !     CHECK_STR_OVERFLOW;
  586. ! 
  587. ! #if defined(__STDC__) && !defined(UNIXCPP)
  588. ! #define MASKNAME(modname) modname##Mask
  589. ! #else
  590. ! #define MASKNAME(modname) modname/**/Mask
  591. ! #endif
  592. ! 
  593. ! #define PRINTMOD(modname) \
  594. !     if (mask & MASKNAME(modname)) {     \
  595. !     if (! (mod & MASKNAME(modname))) \
  596. !         *str++ = '~';         \
  597. !     else if (notfirst)         \
  598. !         *str++ = ' ';         \
  599. !     *str = '\0';             \
  600. !     strcat(str, "modname");         \
  601. !     str += strlen(str);         \
  602. !     notfirst = True;         \
  603. !     }
  604. ! 
  605. ! #define CtrlMask ControlMask
  606. ! 
  607. !     PRINTMOD(Shift);
  608. !     PRINTMOD(Ctrl);
  609. !     PRINTMOD(Lock);
  610. !     PRINTMOD(Mod1);
  611. !     PRINTMOD(Mod2);
  612. !     PRINTMOD(Mod3);
  613. !     PRINTMOD(Mod4);
  614. !     PRINTMOD(Mod5);
  615. !     PRINTMOD(Button1);
  616. !     PRINTMOD(Button2);
  617. !     PRINTMOD(Button3);
  618. !     PRINTMOD(Button4);
  619. !     PRINTMOD(Button5);
  620. ! 
  621. ! #undef MASKNAME
  622. ! #undef PRINTMOD
  623. ! #undef CtrlMask
  624. ! 
  625.       return str;
  626.   }
  627.   
  628. ! static String PrintEventType(buf, len, str, event)
  629. !     String *buf;
  630. !     int *len;
  631.       register String str;
  632.       unsigned long event;
  633.   {
  634. +     CHECK_STR_OVERFLOW;
  635.       switch (event) {
  636.   #define PRINTEVENT(event) case event: (void) sprintf(str, "<event>"); break;
  637.       PRINTEVENT(KeyPress)
  638. ***************
  639. *** 131,140 ****
  640.       return str;
  641.   }
  642.   
  643. ! static String PrintCode(str, mask, code)
  644.       register String str;
  645.       unsigned long mask, code;
  646.   {
  647.       if (mask != 0) {
  648.       if (mask != (unsigned long)~0L)
  649.           (void) sprintf(str, "0x%lx:0x%lx", mask, code);
  650. --- 177,189 ----
  651.       return str;
  652.   }
  653.   
  654. ! static String PrintCode(buf, len, str, mask, code)
  655. !     String *buf;
  656. !     int *len;
  657.       register String str;
  658.       unsigned long mask, code;
  659.   {
  660. +     CHECK_STR_OVERFLOW;
  661.       if (mask != 0) {
  662.       if (mask != (unsigned long)~0L)
  663.           (void) sprintf(str, "0x%lx:0x%lx", mask, code);
  664. ***************
  665. *** 144,165 ****
  666.       return str;
  667.   }
  668.   
  669. ! static String PrintEvent(str, event)
  670.       register String str;
  671.       register Event *event;
  672.   {
  673. !     str = PrintModifiers(str, event->modifierMask, event->modifiers);
  674. !     str = PrintEventType(str, event->eventType);
  675. !     str = PrintCode(str, event->eventCodeMask, event->eventCode);
  676.       return str;
  677.   }
  678.   
  679. ! static String PrintParams(str, params, num_params)
  680.       register String str, *params;
  681.       Cardinal num_params;
  682.   {
  683.       register Cardinal i;
  684.       for (i = 0; i<num_params; i++) {
  685.       if (i != 0) (void) sprintf(str, ", ");
  686.       str += strlen(str);
  687.       (void) sprintf(str, "\"%s\"", params[i]);
  688. --- 193,243 ----
  689.       return str;
  690.   }
  691.   
  692. ! static String PrintLateModifiers(buf, len, str, lateModifiers)
  693. !     String *buf;
  694. !     int *len;
  695.       register String str;
  696. +     LateBindingsPtr lateModifiers;
  697. + {
  698. +     for (; lateModifiers->keysym != NULL; lateModifiers++) {
  699. +     CHECK_STR_OVERFLOW;
  700. +     if (lateModifiers->knot) {
  701. +         *str++ = '~';
  702. +         *str = '\0';
  703. +     }
  704. +     strcat(str, XKeysymToString(lateModifiers->keysym));
  705. +     str += strlen(str);
  706. +     if (lateModifiers->pair) {
  707. +         *(str -= 2) = '\0';    /* strip "_L" */
  708. +         lateModifiers++;    /* skip _R keysym */
  709. +     }
  710. +     }
  711. +     return str;
  712. + }
  713. + 
  714. + static String PrintEvent(buf, len, str, event)
  715. +     String *buf;
  716. +     int *len;
  717. +     register String str;
  718.       register Event *event;
  719.   {
  720. !     str = PrintModifiers(buf, len, str, event->modifierMask, event->modifiers);
  721. !     if (event->lateModifiers != NULL)
  722. !     str = PrintLateModifiers(buf, len, str, event->lateModifiers);
  723. !     str = PrintEventType(buf, len, str, event->eventType);
  724. !     str = PrintCode(buf, len, str, event->eventCodeMask, event->eventCode);
  725.       return str;
  726.   }
  727.   
  728. ! static String PrintParams(buf, len, str, params, num_params)
  729. !     String *buf;
  730. !     int *len;
  731.       register String str, *params;
  732.       Cardinal num_params;
  733.   {
  734.       register Cardinal i;
  735.       for (i = 0; i<num_params; i++) {
  736. +     ExpandToFit( params[i] );
  737.       if (i != 0) (void) sprintf(str, ", ");
  738.       str += strlen(str);
  739.       (void) sprintf(str, "\"%s\"", params[i]);
  740. ***************
  741. *** 168,183 ****
  742.       return str;
  743.   }
  744.   
  745. ! static String PrintActions(str, actions, quarkTable)
  746.       register String str;
  747.       register ActionPtr actions;
  748.       XrmQuark* quarkTable;
  749.   {
  750. !     while (actions != NULL && actions->token != NULL) {
  751. !         (void) sprintf(
  752. !             str, " %s(", XrmQuarkToString(quarkTable[actions->index]));
  753.       str += strlen(str);
  754. !     str = PrintParams(str, actions->params, (Cardinal)actions->num_params);
  755.       str += strlen(str);
  756.       (void) sprintf(str, ")");
  757.       str += strlen(str);
  758. --- 246,264 ----
  759.       return str;
  760.   }
  761.   
  762. ! static String PrintActions(buf, len, str, actions, quarkTable)
  763. !     String *buf;
  764. !     int *len;
  765.       register String str;
  766.       register ActionPtr actions;
  767.       XrmQuark* quarkTable;
  768.   {
  769. !     while (actions != NULL /* && actions->token != NULL */) {
  770. !     String proc = XrmQuarkToString(quarkTable[actions->index]);
  771. !     ExpandToFit( proc );
  772. !         (void) sprintf(str, " %s(", proc);
  773.       str += strlen(str);
  774. !     str = PrintParams(buf, len, str, actions->params, (Cardinal)actions->num_params);
  775.       str += strlen(str);
  776.       (void) sprintf(str, ")");
  777.       str += strlen(str);
  778. ***************
  779. *** 1002,1007 ****
  780. --- 1083,1089 ----
  781.       if (unbound != 0) ReportUnboundActions(tm, stateTable);
  782.   }
  783.   
  784. + static
  785.   void _XtBindAccActions(widget,stateTable,index,accBindings)
  786.       Widget        widget;
  787.       XtTranslations  stateTable;
  788. ***************
  789. *** 1491,1527 ****
  790.   void XtInstallAccelerators(destination,source)
  791.       Widget destination,source;
  792.   {
  793. -     char str[100];
  794. -     XtTranslations temp;
  795.       XtBoundAccActions accBindings;
  796.       if ((!XtIsWindowObject(source)) ||
  797.           source->core.accelerators == NULL) return;
  798. !     if (source->core.accelerators != NULL 
  799. !         && source->core.accelerators->accProcTbl == NULL)
  800.           _XtBindAccActions(source,source->core.accelerators,0,&accBindings);
  801. !     _XtInitializeStateTable(&temp);
  802. !     temp->clickTime = source->core.accelerators->clickTime;
  803. !     if (source->core.accelerators->operation == XtTableOverride) {
  804. !         MergeTables(temp,source->core.accelerators,FALSE,accBindings);
  805. !         MergeTables(temp, destination->core.tm.translations,FALSE,
  806. !                destination->core.tm.translations->accProcTbl);
  807.       }
  808. !     else { 
  809. !         MergeTables(temp, destination->core.tm.translations,FALSE,
  810. !                destination->core.tm.translations->accProcTbl);
  811. !         MergeTables(temp,source->core.accelerators,FALSE,accBindings);
  812.       }
  813. -     destination->core.tm.translations = temp;
  814.       if (XtIsRealized(destination))
  815.           _XtInstallTranslations(destination,
  816.                destination->core.tm.translations);
  817.       XtAddCallback(source, XtNdestroyCallback,
  818. !         RemoveAccelerators,(caddr_t)temp);
  819.       if (XtClass(source)->core_class.display_accelerator != NULL){
  820.            str[0] = '\0';
  821. !          (void) PrintEvent(&str[0],
  822. !                 &source->core.tm.translations->eventObjTbl[0].event);
  823. !          (*(XtClass(source)->core_class.display_accelerator))(source,str);
  824.       }
  825.   }         
  826.   void XtInstallAllAccelerators(destination,source)
  827. --- 1573,1632 ----
  828.   void XtInstallAccelerators(destination,source)
  829.       Widget destination,source;
  830.   {
  831.       XtBoundAccActions accBindings;
  832.       if ((!XtIsWindowObject(source)) ||
  833.           source->core.accelerators == NULL) return;
  834. ! /*    if (source->core.accelerators->accProcTbl == NULL)
  835. !  *  %%%
  836. !  *  The spec is not clear on when actions specified in accelerators are bound;
  837. !  *  The most useful (and easiest) thing seems to be to bind them at this time
  838. !  *  (rather than at Realize).  Under the current code the preceeding test
  839. !  *  seems always to be True, thus guaranteeing accBindings is always set
  840. !  *  before being used below.
  841. !  */
  842.           _XtBindAccActions(source,source->core.accelerators,0,&accBindings);
  843. !     if (destination->core.tm.translations == NULL) {
  844. !     destination->core.tm.translations = source->core.accelerators;
  845. !     destination->core.tm.translations->accProcTbl = accBindings;
  846.       }
  847. !     else {
  848. !     XtTranslations temp;
  849. !     _XtInitializeStateTable(&temp);
  850. !     temp->clickTime = source->core.accelerators->clickTime;
  851. !     if (source->core.accelerators->operation == XtTableOverride) {
  852. !         MergeTables(temp,source->core.accelerators,FALSE,accBindings);
  853. !         MergeTables(temp, destination->core.tm.translations,FALSE,
  854. !            destination->core.tm.translations->accProcTbl);
  855. !     }
  856. !     else { 
  857. !         MergeTables(temp, destination->core.tm.translations,FALSE,
  858. !            destination->core.tm.translations->accProcTbl);
  859. !         MergeTables(temp,source->core.accelerators,FALSE,accBindings);
  860. !     }
  861. !     destination->core.tm.translations = temp;
  862.       }
  863.       if (XtIsRealized(destination))
  864.           _XtInstallTranslations(destination,
  865.                destination->core.tm.translations);
  866.       XtAddCallback(source, XtNdestroyCallback,
  867. !         RemoveAccelerators,(caddr_t)destination->core.tm.translations);
  868.       if (XtClass(source)->core_class.display_accelerator != NULL){
  869. +      char *buf = XtMalloc(100);
  870. +      int len = 100;
  871. +      String str = buf;
  872. +      int i;
  873.            str[0] = '\0';
  874. !      for (i = 0; i < source->core.accelerators->numEvents;) {
  875. !          str = PrintEvent(&str, &len, str,
  876. !                 &source->core.accelerators->eventObjTbl[i].event);
  877. !          if (++i == source->core.accelerators->numEvents) break;
  878. !          else {
  879. !          *str++ = '\n';
  880. !          *str = '\0';
  881. !          }
  882. !      }
  883. !          (*(XtClass(source)->core_class.display_accelerator))(source,buf);
  884. !      XtFree(buf);
  885.       }
  886.   }         
  887.   void XtInstallAllAccelerators(destination,source)
  888. ***************
  889. *** 1574,1581 ****
  890.   
  891.   }
  892.   
  893. ! static void PrintState(start, str, state, quarkTable, eot)
  894. !     register String start, str;
  895.       StatePtr state;
  896.       XrmQuark* quarkTable;
  897.       EventObjPtr eot;
  898. --- 1679,1688 ----
  899.   
  900.   }
  901.   
  902. ! static void PrintState(buf, len, str, state, quarkTable, eot)
  903. !     String *buf;
  904. !     int *len;
  905. !     register String str;
  906.       StatePtr state;
  907.       XrmQuark* quarkTable;
  908.       EventObjPtr eot;
  909. ***************
  910. *** 1584,1608 ****
  911.       /* print the current state */
  912.       if (state == NULL) return;
  913.   
  914. !     str = PrintEvent(str, &eot[state->index].event);
  915. !     str += strlen(str);
  916.       if (state->actions != NULL) {
  917. !     String temp = str;
  918.       (void) sprintf(str, "%s: ", (state->cycle ? "(+)" : ""));
  919.       while (*str) str++;
  920. !     (void) PrintActions(str, state->actions, quarkTable);
  921. !     (void) printf("%s\n", start);
  922. !     str = temp; *str = '\0';
  923.       }
  924.   
  925.       /* print succeeding states */
  926.       if (!state->cycle)
  927. !     PrintState(start, str, state->nextLevel, quarkTable, eot);
  928.   
  929.       str = old; *str = '\0';
  930.   
  931.       /* print sibling states */
  932. !     PrintState(start, str, state->next, quarkTable, eot);
  933.       *str = '\0';
  934.   
  935.   }
  936. --- 1691,1715 ----
  937.       /* print the current state */
  938.       if (state == NULL) return;
  939.   
  940. !     str = PrintEvent(buf, len, str, &eot[state->index].event);
  941.       if (state->actions != NULL) {
  942. !     int offset = str - *buf;
  943. !     CHECK_STR_OVERFLOW;
  944.       (void) sprintf(str, "%s: ", (state->cycle ? "(+)" : ""));
  945.       while (*str) str++;
  946. !     (void) PrintActions(buf, len, str, state->actions, quarkTable);
  947. !     (void) printf("%s\n", *buf);
  948. !     str = *buf + offset; *str = '\0';
  949.       }
  950.   
  951.       /* print succeeding states */
  952.       if (!state->cycle)
  953. !     PrintState(buf, len, str, state->nextLevel, quarkTable, eot);
  954.   
  955.       str = old; *str = '\0';
  956.   
  957.       /* print sibling states */
  958. !     PrintState(buf, len, str, state->next, quarkTable, eot);
  959.       *str = '\0';
  960.   
  961.   }
  962. ***************
  963. *** 1615,1631 ****
  964.       XtTranslations translations;
  965.   {
  966.       register Cardinal i;
  967. !     char buf[1000];
  968.   
  969.       for (i = 0; i < translations->numEvents; i++) {
  970.       buf[0] = '\0';
  971.       PrintState(
  972. !        &buf[0],
  973. !        &buf[0],
  974.          translations->eventObjTbl[i].state,
  975.              translations->quarkTable,
  976.          translations->eventObjTbl);
  977.       }
  978.   }
  979.   
  980.   /***********************************************************************
  981. --- 1722,1741 ----
  982.       XtTranslations translations;
  983.   {
  984.       register Cardinal i;
  985. !     int len = 1000;
  986. !     char *buf = XtMalloc(1000);
  987.   
  988.       for (i = 0; i < translations->numEvents; i++) {
  989.       buf[0] = '\0';
  990.       PrintState(
  991. !        &buf,
  992. !        &len,
  993. !        buf,
  994.          translations->eventObjTbl[i].state,
  995.              translations->quarkTable,
  996.          translations->eventObjTbl);
  997.       }
  998. +     XtFree(buf);
  999.   }
  1000.   
  1001.   /***********************************************************************
  1002.  
  1003.  
  1004. *** /tmp/,RCSt1a09958    Thu Dec 22 17:26:10 1988
  1005. --- server/dix/resource.c    Thu Dec 22 16:58:08 1988
  1006. ***************
  1007. *** 22,28 ****
  1008.   
  1009.   ********************************************************/
  1010.   
  1011. ! /* $XConsortium: resource.c,v 1.66 88/09/06 15:41:20 jim Exp $ */
  1012.   
  1013.   /*    Routines to manage various kinds of resources:
  1014.    *
  1015. --- 22,28 ----
  1016.   
  1017.   ********************************************************/
  1018.   
  1019. ! /* $XConsortium: resource.c,v 1.67 88/12/22 16:58:58 rws Exp $ */
  1020.   
  1021.   /*    Routines to manage various kinds of resources:
  1022.    *
  1023. ***************
  1024. *** 169,176 ****
  1025.       pointer value;
  1026.       int (* func)();
  1027.   {
  1028. !     int client, j;
  1029. !     ResourcePtr res, next, *head;
  1030.           
  1031.       client = CLIENT_ID(id);
  1032.       if (!clientTable[client].buckets)
  1033. --- 169,177 ----
  1034.       pointer value;
  1035.       int (* func)();
  1036.   {
  1037. !     int client;
  1038. !     register int j;
  1039. !     register ResourcePtr res, next, *head;
  1040.           
  1041.       client = CLIENT_ID(id);
  1042.       if (!clientTable[client].buckets)
  1043. ***************
  1044. *** 195,206 ****
  1045.       clientTable[client].hashsize++;
  1046.       for (j = 0; j < clientTable[client].buckets; j++)
  1047.       {
  1048.           for (res = clientTable[client].resources[j]; res; res = next)
  1049.           {
  1050.           next = res->next;
  1051.           head = &resources[Hash(client, res->id)];
  1052. !         res->next = *head;
  1053.           *head = res;
  1054.           }
  1055.       }
  1056.       clientTable[client].buckets *= 2;
  1057. --- 196,213 ----
  1058.       clientTable[client].hashsize++;
  1059.       for (j = 0; j < clientTable[client].buckets; j++)
  1060.       {
  1061. +         /*
  1062. +          * Must preserve insertion order so that FreeResource doesn't free
  1063. +          * "subclasses" before main resources are freed.  Sigh.
  1064. +          */
  1065.           for (res = clientTable[client].resources[j]; res; res = next)
  1066.           {
  1067.           next = res->next;
  1068.           head = &resources[Hash(client, res->id)];
  1069. !         while (*head)
  1070. !             head = &(*head)->next;
  1071.           *head = res;
  1072. +         res->next = NullResource;
  1073.           }
  1074.       }
  1075.       clientTable[client].buckets *= 2;
  1076.  
  1077.  
  1078. *** /tmp/,RCSt1a03822    Thu Jan 12 17:43:12 1989
  1079. --- server/ddx/cfb/cfbscrinit.c    Thu Jan 12 17:41:35 1989
  1080. ***************
  1081. *** 64,70 ****
  1082.       8,        1,        NULL,
  1083.   };
  1084.   
  1085. - static ColormapPtr cfbColorMaps[NUMVISUALS];    /* assume one per visual */
  1086.   #define NUMDEPTHS    ((sizeof depths)/(sizeof depths[0]))
  1087.   
  1088.   /* dts * (inch/dot) * (25.4 mm / inch) = mm */
  1089. --- 64,69 ----
  1090. ***************
  1091. *** 80,85 ****
  1092. --- 79,85 ----
  1093.       register PixmapPtr pPixmap;
  1094.       int    i;
  1095.       void cfbInitialize332Colormap();
  1096. +     ColormapPtr cmap;
  1097.   
  1098.       pScreen->myNum = index;
  1099.       pScreen->width = xsize;
  1100. ***************
  1101. *** 171,195 ****
  1102.       visuals[i].screen = index;
  1103.       AddResource(visuals[i].vid, RT_VISUALID, (pointer)&visuals[i],
  1104.               NoopDDA, RC_CORE);
  1105. -     switch (visuals[i].class) {
  1106. -     case StaticGray:
  1107. -     case StaticColor:
  1108. -         CreateColormap(FakeClientID(0), pScreen, &visuals[i], 
  1109. -         &cfbColorMaps[i], AllocAll, 0);
  1110. -         break;
  1111. -     case PseudoColor:
  1112. -     case GrayScale:
  1113. -         CreateColormap(FakeClientID(0), pScreen, &visuals[i], 
  1114. -         &cfbColorMaps[i], AllocNone, 0);
  1115. -         break;
  1116. -     case TrueColor:
  1117. -     case DirectColor:
  1118. -         FatalError("Bad visual in cfbScreenInit\n");
  1119. -     }
  1120. -     if (!cfbColorMaps[i])
  1121. -         FatalError("Can't create colormap in cfbScreenInit\n");
  1122.       }
  1123. -     pScreen->defColormap = cfbColorMaps[ROOTVISUAL]->mid;
  1124.       pScreen->rootVisual = visuals[ROOTVISUAL].vid;
  1125.   
  1126.       /*  Set up the remaining fields in the depths[] array */
  1127. --- 171,177 ----
  1128. ***************
  1129. *** 201,206 ****
  1130. --- 183,207 ----
  1131.           pVids[0] = visuals[ROOTVISUAL].vid;
  1132.       }
  1133.       }
  1134. + 
  1135. +     pScreen->defColormap = FakeClientID(0);
  1136. +     switch (visuals[ROOTVISUAL].class) {
  1137. +     case StaticGray:
  1138. +     case StaticColor:
  1139. +     CreateColormap(pScreen->defColormap, pScreen, &visuals[ROOTVISUAL],
  1140. +                &cmap, AllocAll, 0);
  1141. +     break;
  1142. +     case PseudoColor:
  1143. +     case GrayScale:
  1144. +     CreateColormap(pScreen->defColormap, pScreen, &visuals[ROOTVISUAL], 
  1145. +                &cmap, AllocNone, 0);
  1146. +     break;
  1147. +     case TrueColor:
  1148. +     case DirectColor:
  1149. +     FatalError("Bad visual in cfbScreenInit\n");
  1150. +     }
  1151. +     if (!cmap)
  1152. +     FatalError("Can't create colormap in cfbScreenInit\n");
  1153.       return( TRUE );
  1154.   }
  1155.   
  1156.  
  1157. *** old/lib/Xt/TMstate.c
  1158. --- lib/Xt/TMstate.c
  1159. ***************
  1160. *** 1,5 ****
  1161.   #ifndef lint
  1162. ! static char Xrcsid[] = "$XConsortium: TMstate.c,v 1.65 89/01/20 08:05:17 swick Exp $";
  1163.   /* $oHeader: TMstate.c,v 1.5 88/09/01 17:17:29 asente Exp $ */
  1164.   #endif lint
  1165.   /*LINTLIBRARY*/
  1166. --- 1,5 ----
  1167.   #ifndef lint
  1168. ! static char Xrcsid[] = "$XConsortium: TMstate.c,v 1.67 89/01/30 15:01:40 swick Exp $";
  1169.   /* $oHeader: TMstate.c,v 1.5 88/09/01 17:17:29 asente Exp $ */
  1170.   #endif lint
  1171.   /*LINTLIBRARY*/
  1172. ***************
  1173. *** 86,128 ****
  1174.       Boolean notfirst = False;
  1175.       CHECK_STR_OVERFLOW;
  1176.   
  1177. ! #if defined(__STDC__) && !defined(UNIXCPP)
  1178. ! #define MASKNAME(modname) modname##Mask
  1179. ! #else
  1180. ! #define MASKNAME(modname) modname/**/Mask
  1181. ! #endif
  1182. ! 
  1183. ! #define PRINTMOD(modname) \
  1184. !     if (mask & MASKNAME(modname)) {     \
  1185. !     if (! (mod & MASKNAME(modname))) \
  1186.           *str++ = '~';         \
  1187.       else if (notfirst)         \
  1188.           *str++ = ' ';         \
  1189.       *str = '\0';             \
  1190. !     strcat(str, "modname");         \
  1191.       str += strlen(str);         \
  1192. -     notfirst = True;         \
  1193.       }
  1194.   
  1195. ! #define CtrlMask ControlMask
  1196.   
  1197. -     PRINTMOD(Shift);
  1198. -     PRINTMOD(Ctrl);
  1199. -     PRINTMOD(Lock);
  1200. -     PRINTMOD(Mod1);
  1201. -     PRINTMOD(Mod2);
  1202. -     PRINTMOD(Mod3);
  1203. -     PRINTMOD(Mod4);
  1204. -     PRINTMOD(Mod5);
  1205. -     PRINTMOD(Button1);
  1206. -     PRINTMOD(Button2);
  1207. -     PRINTMOD(Button3);
  1208. -     PRINTMOD(Button4);
  1209. -     PRINTMOD(Button5);
  1210. - 
  1211. - #undef MASKNAME
  1212.   #undef PRINTMOD
  1213. - #undef CtrlMask
  1214.   
  1215.       return str;
  1216.   }
  1217. --- 86,120 ----
  1218.       Boolean notfirst = False;
  1219.       CHECK_STR_OVERFLOW;
  1220.   
  1221. ! #define PRINTMOD(modmask,modstring) \
  1222. !     if (mask & modmask) {         \
  1223. !     if (! (mod & modmask)) {     \
  1224.           *str++ = '~';         \
  1225. +         notfirst = True;         \
  1226. +     }                 \
  1227.       else if (notfirst)         \
  1228.           *str++ = ' ';         \
  1229. +     else notfirst = True;         \
  1230.       *str = '\0';             \
  1231. !     strcat(str, modstring);         \
  1232.       str += strlen(str);         \
  1233.       }
  1234.   
  1235. !     PRINTMOD(ShiftMask, "Shift");
  1236. !     PRINTMOD(ControlMask, "Ctrl");    /* name is not CtrlMask... */
  1237. !     PRINTMOD(LockMask, "Lock");
  1238. !     PRINTMOD(Mod1Mask, "Mod1");
  1239. !     PRINTMOD(Mod2Mask, "Mod2");
  1240. !     PRINTMOD(Mod3Mask, "Mod3");
  1241. !     PRINTMOD(Mod4Mask, "Mod4");
  1242. !     PRINTMOD(Mod5Mask, "Mod5");
  1243. !     PRINTMOD(Button1Mask, "Button1");
  1244. !     PRINTMOD(Button2Mask, "Button2");
  1245. !     PRINTMOD(Button3Mask, "Button3");
  1246. !     PRINTMOD(Button4Mask, "Button4");
  1247. !     PRINTMOD(Button5Mask, "Button5");
  1248.   
  1249.   #undef PRINTMOD
  1250.   
  1251.       return str;
  1252.   }
  1253. -- 
  1254. Mike Wexler(wyse!mikew)    Phone: (408)433-1000 x1330
  1255. Moderator of comp.sources.x
  1256.